home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 12
/
Amiga Format AFCD12 (Apr 1997, Issue 96).iso
/
-readerstuff-
/
martyn_bampton
/
martyn's_icons_1
/
install-mb-icons
< prev
next >
Wrap
Text File
|
1997-02-03
|
4KB
|
147 lines
;MAGICWB DRAWER ICONS INSTALL SCRIPT Ver1 - 23 NOV '96 © <M>.
;------------------------------------------------------------
Echo " "
Echo " Martyn's MagicWB Icons Install."
Echo " -------------------------------"
Echo " "
Echo " Script by Martyn Bampton © <M>, here we go!"
Echo " <Click close gadget if req>"
REQUESTCHOICE >ENV:Answer "Install Martyn's Drawer Icons" "This script will install my drawer icons." "OK" "CANCEL"
IF $Answer EQ "1"
IF $Answer EQ "2"
ENDIF
REQUESTCHOICE >ENV:Answer "Install Martyn's Drawer Icons" "Have you read the docs?" "Yes" "No"
IF $Answer EQ "1"
IF $Answer EQ "2"
ENDIF
REQUESTCHOICE >ENV:Answer "Install Martyn's Drawer Icons" "ARE YOU SURE? (EXISTING ICONS WILL BE LOST!!!)" "Continue" "Abort"
IF $Answer EQ "1"
IF $Answer EQ "2"
ENDIF
;ASSIGN SECTION. - AF PLEASE ASSIGN THIS CORRECTLY! -
;---------------
Assign DRAWERS: AFCD12:-ReaderStuff-/Martyn_Bampton/Martyn's_Icons_1/Martyn's_Drawers
COPY DRAWERS:C.info TO SYS:C.info
COPY DRAWERS:DOSDrivers.info TO SYS:Devs/DOSDrivers.info
COPY DRAWERS:Expansion.info TO SYS:Expansion.info
COPY DRAWERS:KeyMaps.info TO SYS:Devs/KeyMaps.info
COPY DRAWERS:Monitors.info TO SYS:Devs/Monitors.info
COPY DRAWERS:Printers.info TO SYS:Devs/Printers.info
COPY DRAWERS:S.info TO SYS:S.info
COPY DRAWERS:Storage.info TO SYS:Storage.info
COPY DRAWERS:T.info TO SYS:T.info
COPY DRAWERS:WBStartup.info TO SYS:WBStartup.info
IF EXISTS SYS:Amiga_Info.info
COPY DRAWERS:Amiga_Info.info TO SYS:Amiga_Info.info
ENDIF
IF EXISTS SYS:CD32.info
COPY DRAWERS:CD32.info TO SYS:CD32.info
ENDIF
IF EXISTS SYS:CPU_Info.info
COPY DRAWERS:Amiga_Info.info TO SYS:CPU_Info.info
ENDIF
IF EXISTS SYS:Data.info
COPY DRAWERS:Data.info TO SYS:Data.info
ENDIF
IF EXISTS SYS:DataBase.info
COPY DRAWERS:DataBase.info TO SYS:DataBase.info
ENDIF
IF EXISTS SYS:Disk_Tools.info
COPY DRAWERS:Disk_Tools.info TO SYS:Disk_Tools.info
ENDIF
IF EXISTS SYS:DPaintIV.info
COPY DRAWERS:DPaintIV.info TO SYS:DPaintIV.info
ENDIF
IF EXISTS SYS:Prefs/Patterns.info
COPY DRAWERS:Patterns.info TO SYS:Patterns.info
ENDIF
IF EXISTS SYS:Prefs/Samples.info
COPY DRAWERS:Samples.info TO SYS:Samples.info
ENDIF
IF EXISTS SYS:Money_Matters.info
COPY DRAWERS:Money_Matters.info TO SYS:Money_Matters.info
ENDIF
IF EXISTS SYS:SquirrelSCSI.info
COPY DRAWERS:Squirrel.info TO SYS:SquirrelSCSI.info
ENDIF
IF EXISTS SYS:Turbo_Calc.info
COPY DRAWERS:Turbo_Cala.info TO SYS:Turbo_Calc.info
ENDIF
IF EXISTS SYS:Wordworth.info
COPY DRAWERS:Wordworth.info TO SYS:Wordworth.info
ENDIF
IF EXISTS GAMES:Worms.info
COPY DRAWERS:TWCustom.info TO SYS:TWCustom.info
ENDIF
IF EXISTS GAMES:Zeewolf.info
COPY DRAWERS:Zeewolf.info TO SYS:Zeewolf.info
ENDIF
ENDIF
ENDIF
ENDIF
;------------------------------------
REQUESTCHOICE >ENV:Answer "Install Martyns Drawer Icons" "This script will install my Def_drawer icon." "OK" "CANCEL"
IF $Answer EQ "1"
IF $Answer EQ "2"
ENDIF
REQUESTCHOICE >ENV:Answer "Install Martyns Drawer Icons" "ARE YOU SURE? This is the icon used in all new drawer operations." "Yes" "No"
IF $Answer EQ "1"
IF $Answer EQ "2"
ENDIF
COPY DRAWERS:Workbench.info TO SYS:Prefs/ENV-Archive/Sys/Def_drawer.info
ENDIF
ENDIF
;------------------------------------
REQUESTCHOICE >ENV:Answer "Install Martyns Drawer Icons" "All Done." "OK"
Echo " "
Echo " I hope it all went well, enjoy the icons."
Echo " Oh yeah, please read the docs if you haven't already."
WAIT 5